;--------------------------------------
;
; setcur.asm
;
; sets the cursor shape
;

;--------------------------------------
;
; include defs, prototypes and macros
;

include tab6.inc

;--------------------------------------
;
; begin code segment
;


    .Code

;--------------------------------------
;
; setCur(void)
;  
;

setCur PROC Pascal PUBLIC, c_start:Byte, c_end:Byte
    mov    ch,c_start             ; cursor shape start row
    mov    cl,c_end               ; cursor shape end row
    mov    ah,SET_CURSOR_SHAPE    ; set cursor shape
    int    10h                    ; via BIOS int 10h
    ret                           ; return to caller
setCur ENDP

;
; end of setCur procedure
;

    END
;
;--------------------------------------
